From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 23 Dec 1993 01:09:51 +0000 (+0000)
Subject: (printchar, strout): Set echo_area_glyphs_length.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~93827
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=708d172af2fb0b70ece1824c669187865736763d;p=emacs.git

(printchar, strout): Set echo_area_glyphs_length.
---

diff --git a/src/print.c b/src/print.c
index 83dcb2a766d..cb8418461de 100644
--- a/src/print.c
+++ b/src/print.c
@@ -205,12 +205,14 @@ printchar (ch, fun)
 	{
 	  echo_area_glyphs = FRAME_MESSAGE_BUF (selected_frame);
 	  printbufidx = 0;
+	  echo_area_glyphs_length = 0;
 	  message_buf_print = 1;
 	}
 
       if (printbufidx < FRAME_WIDTH (selected_frame) - 1)
 	FRAME_MESSAGE_BUF (selected_frame)[printbufidx++] = ch;
       FRAME_MESSAGE_BUF (selected_frame)[printbufidx] = 0;
+      echo_area_glyphs_length = printbufidx;
 
       return;
     }
@@ -257,6 +259,7 @@ strout (ptr, size, printcharfun)
 	{
 	  echo_area_glyphs = FRAME_MESSAGE_BUF (selected_frame);
 	  printbufidx = 0;
+	  echo_area_glyphs_length = 0;
 	  message_buf_print = 1;
 	}
 
@@ -264,6 +267,7 @@ strout (ptr, size, printcharfun)
 	i = FRAME_WIDTH (selected_frame) - printbufidx - 1;
       bcopy (ptr, &FRAME_MESSAGE_BUF (selected_frame) [printbufidx], i);
       printbufidx += i;
+      echo_area_glyphs_length = printbufidx;
       FRAME_MESSAGE_BUF (selected_frame) [printbufidx] = 0;
 
       return;